(rmail-summary-goto-msg): Don't call itself

recursively if the last message is deleted, thus avoiding an
infinite loop.

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index cd8d7d67aa467b9c44b79100e542cacc62a1a939..a49b47453d84093b73182ba73dcb0fcef915b5a0 100644 (file)
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -1074,7 +1074,8 @@ If SKIP-RMAIL, don't do anything to the Rmail buffer."
       (if (< n 1)
          (progn (message "No preceding message")
                 (setq n 1)))
-      (if (> n total)
+      (if (and (> n total)
+              (> total 0))
          (progn (message "No following message")
                 (goto-char (point-max))
                 (rmail-summary-goto-msg nil nowarn skip-rmail)))